home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 19 / CU Amiga Magazine's Super CD-ROM 19 (1998)(EMAP Images)(GB)[!][issue 1998-02].iso / CUCD / Programming / LEDA / source / src / basic / _basic.c.ORG < prev    next >
Encoding:
Text File  |  1994-11-16  |  3.6 KB  |  208 lines
  1. /*******************************************************************************
  2. +
  3. +  LEDA  3.1c
  4. +
  5. +
  6. +  _basic.c
  7. +
  8. +
  9. +  Copyright (c) 1994  by  Max-Planck-Institut fuer Informatik
  10. +  Im Stadtwald, 6600 Saarbruecken, FRG     
  11. +  All rights reserved.
  12. + 
  13. *******************************************************************************/
  14.  
  15.  
  16. #include <LEDA/basic.h>
  17.  
  18. #include <time.h>
  19. #include <string.h>
  20. #include <sys/types.h>
  21.  
  22. #if defined(__MSDOS__)
  23. #include <dos.h>
  24. #else
  25. #include <unistd.h>
  26. #include <sys/times.h>
  27. #include <sys/param.h>
  28. #endif
  29.  
  30.  
  31. int LEDA::loop_dummy = 0;
  32.  
  33.  
  34. LEDA::LEDA()
  35. { init_list = getenv("LEDA_INIT");
  36.   init_random();
  37.  }
  38.  
  39.  
  40. LEDA::~LEDA() 
  41. { 
  42.   if (init_list && strcmp(init_list,"statistics")==0)
  43.   { if (version_string) printf("\n%s\n",version_string);
  44.     printf("\n");
  45.     print_statistics(); 
  46.    }
  47.  } 
  48.  
  49.  
  50. LEDA L_E_D_A;
  51.  
  52.  
  53.  
  54. //------------------------------------------------------------------------------
  55. // Error Handling
  56. //------------------------------------------------------------------------------
  57.  
  58.  
  59. PEH p_error_handler = default_error_handler;
  60.  
  61. void default_error_handler(int i, const char* s)
  62. { if (i==0) 
  63.    cout << "(warning) " << s << "\n";
  64.   else 
  65.    { cout << "ERROR "<< s << "\n";
  66.      cout.flush();
  67.      abort();
  68.     }
  69. }
  70.  
  71. PEH set_error_handler(PEH handler)
  72. { PEH old = error_handler;
  73.   p_error_handler = handler;
  74.   return old;
  75. }
  76.  
  77. //------------------------------------------------------------------------------
  78. // useful functions
  79. //------------------------------------------------------------------------------
  80.  
  81. LEDA_SIG_PF catch_interrupts(LEDA_SIG_PF handler) 
  82. { error_handler(0,"catch_interrupts not implemented.");
  83.   return handler; 
  84.  }
  85.  
  86.  
  87.  
  88. void init_random(int seed)
  89. { time_t l = seed;
  90.   if (l==0) time(&l);
  91.   srandom(int(l));
  92.  }
  93.  
  94.  
  95. #if defined(__MSDOS__) 
  96.  
  97. #if defined(__GNUG__)
  98. static long clock()
  99. { union REGS regs;
  100.   regs.h.ah=0x00;
  101.   int86(0x1A,®s,®s);
  102.   return (regs.x.cx << 16) + regs.x.dx;
  103. }
  104. #define CLK_TCK  18.2
  105. #endif
  106.  
  107. float used_time() { return  float(clock())/CLK_TCK; }
  108.  
  109. #else
  110.  
  111. float used_time()
  112. { tms x;
  113.   times(&x);
  114.   return  float(x.tms_utime)/HZ;
  115. }
  116.  
  117. #endif
  118.  
  119.  
  120. float used_time(float& T)
  121. { float t = T;
  122.   T =  used_time();
  123.   return  T-t;
  124. }
  125.  
  126.  
  127. void print_time(string s)
  128. { cout << s;
  129.   cout << string("  time= %.2f sec",used_time());
  130.   newline;
  131. }
  132.  
  133.  
  134. void wait(unsigned int sec) { sleep(sec); }
  135.   
  136.  
  137. //------------------------------------------------------------------------------
  138. // Input/Ouput
  139. //------------------------------------------------------------------------------
  140.  
  141.  
  142. int Yes(string s)
  143. { char answer = read_char(s);
  144.   return ((answer == 'y') || (answer == 'Y'));
  145. }
  146.  
  147. int read_int(string s)
  148. { int answer;
  149.   char c;
  150.  
  151.   for(;;)
  152.   { cout << s;
  153.     cin >> answer;
  154.     if (!cin) 
  155.       { cin.clear();
  156.         cin.get(c);
  157.         cout << string("read_int: illegal input \"%c\"\n",c);
  158.         if (c != '\n') skip_line(cin);
  159.        }
  160.     else  
  161.        break;
  162.    }
  163.  
  164.   skip_line(cin);
  165.  
  166.   return answer;
  167. }
  168.  
  169. char read_char(string s)
  170. { char c;
  171.   cout << s;
  172.   cin.get(c);
  173.   if (c != '\n') skip_line(cin);
  174.   return c;
  175. }
  176.  
  177. double read_real(string s)
  178. { double answer;
  179.   cout << s;
  180.   cin >> answer;
  181.   skip_line(cin);
  182.   return answer;
  183. }
  184.  
  185. string read_line(istream& in)
  186. { string result;
  187.   result.read_line(in); 
  188.   return result;
  189.  }
  190.  
  191. string read_string(string s)
  192. { cout << s << flush;
  193.   return read_line(cin); 
  194.  }
  195.  
  196. void skip_line(istream& s)
  197. { char c;
  198.   while(s.get(c) &&  c != '\n');
  199.  }
  200.  
  201.  
  202. int     Yes()              { return Yes(""); }
  203. int     read_int()         { return read_int(""); }
  204. char    read_char()        { return read_char(""); }
  205. double  read_real()        { return read_real(""); }
  206. string  read_string()      { return read_string(""); } 
  207.  
  208.